home *** CD-ROM | disk | FTP | other *** search
/ Just Call Me Internet / Just Call Me Internet.iso / com / computer / casio_st / prog_fx / oisac2 / l_5934.txt < prev    next >
Text File  |  1994-03-01  |  1KB  |  32 lines
  1. 5 GOTO10010
  2. 10 DATAOhm's law,"V=IR   (I=Q/t , R=“¥l/S)",10,20,1,3E40484830
  3. 20 DATAResistance,"R=RÆ+R’ , 1/R=1/RÆ+1/R’",10,30,
  4. 30 DATADC circuit,V=E-IR,20,40,
  5. 40 DATADC power & Joule heat,"P=IV=IýR , W=IVt=Pt",30,50,
  6. 50 DATAConductance,G=1/R=I/V,40,60,
  7. 60 DATAKirchhoff's law,"äñI=0 , äñV=0",50,70,
  8. 70 DATAWheatstone bridge,RßRÆ=R’R“,60,80,1,2A2A3E0000
  9. 80 DATAAC instantaneous value,"V=Vߥsinït , I=Iߥsinït",70,90,
  10. 90 DATAAC effective value,"I=Iß/û2 , V=Vß/û2",80,100,
  11. 100 DATAAC power,P=VI=VßIß/2,90,110,
  12. 110 DATAPower factor,P=VI¥cosí,100,120,
  13. 120 DATATransformer,"IÆVÆ=I’V’ , N’/NÆ=V’/VÆ",110,130,
  14. 130 DATAReactance,"X=ïL=2ãfL , X=1/ïC=1/2ãfC",120,140,
  15. 140 DATAImpedance,"Z=û(Rý+(ïL-1/ïC)ý) , Vß=ZIß",130,150,
  16. 150 DATANatural frequency (circuit),fß=1/2ãû(LC),140,160,
  17. 160 DATAElectric oscillation,1/2¥Qý/C+1/2¥LIý=Constant,150,160,
  18. 10010 MODE8:DIM:x=10:y=160:r=x
  19. 10020 DEFCHR$(255)="3E020C223E"
  20. 10040 DEFCHR$(253)="2E2A3A0000"
  21. 10050 DEFCHR$(252)="123E020000"
  22. 10110 RESTORE(r)
  23. 10120 CLS:READm$,n$,b,c,d:IFd=1 THENREADd$:DEFCHR$(254)=d$
  24. 10130 l$="["+MID$(STR$(r/10),2)+"]":l=32-LEN(l$)
  25. 10140 PRINTm$;TAB(l);l$;n$;
  26. 10150 z=ASC(INPUT$(1,@))
  27. 10170 IFz=29 ANDr<>x THENr=x:GOTO10110
  28. 10180 IFz=28 ANDr<>y THENr=y:GOTO10110
  29. 10190 IFz=30 ANDr<>b THENr=b:GOTO10110
  30. 10200 IF(z=31 ORz=13) ANDr<>c THENr=c:GOTO10110
  31. 10280 GOTO10150
  32.